home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Macintosh Bible Guide to Games
/
GameGuideCd.bin
/
Cheaters
/
Marathon Stuff
/
Pfhorte_1.0d22ƒ
/
Scripts
/
#MakeControlPanel
next >
Wrap
Text File
|
1995-08-07
|
703b
|
25 lines
* This script is Copyright 1995 by Steve Israelson
* Segments a line and then adds a small alcove
* to that line segment. Then puts a control panel in it.
*
* Before calling this script, set A to the control panel type.
segmentLine 512
* The pen is at the first point in the line pointing at the
* second, so turn -90 degrees to point away from the line
turn -90
newLine 64
turn 90
* here we set the type of next wall to the specified control panel
wallType A
newLine 512
* Here we use a shortcut to connect to the last line of the
* original starting segment
lastPoint
makeLine
* We are done plotting points, now actually make the poly
floorHeight 400
height 512
polyType MonsterImpassable
closePoly